;Shows text characteristics.
;
;
;	AUTHOR: HENRY C. FRANCIS
;		425 N. ASHE ST.
;		SOUTHERN PINES, NC 28387
;              
;		All rights reserved without prejudice.
;
;	Copyright:	11-13-96
;	Edited:		11-13-96
;
(defun c:tsize ( / )
(setq ename_selp (nentselp))
(setq ent_sel(entget (car ename_selp)))
(setq e_list (cdr ent_sel))
  (setq num (load_dialog "tsize"))
;  (set_e_list)
  (new_dialog "tsize" num)
  (mode_tile "e_list" 2)
  (action_tile "e_list" "(get_tile \"e_list\")")
  (start_list "e_list")
;  (mapcar 'add_list e_list)
;  (end_list)
  (start_dialog)
)
